@L}5 _$% l0$)$$Hȱ$ UhL" `e$$%`$%`  R@P!( L(1   Y I`  d  Ld M * @  $ % CC$$)%1 Udߥ$9%: !0 S$% DD˙`  }J)Lr poczatek equ $4900 org poczatek opt %0100101* --- --- *dliv equ 512}dmactls equ 559dlist equ 560nmien equ 54286wsync equ 54282vcount equ 54283chba}se equ 54281* --- --- *infofont equ $b400fonts equ $b800* --- --- *zero e}qu $f0reals equ zero *wyrazpusty equ 16prkraj equ 24poclw3 equ 66lwkraj equ 20zapora equ 38}pradnica equ 74pozzap equ 76pozpradnica equ 78modul equ $3400fx_adr equ $3bc2m_init equ modul+3m_tact  } equ modul+6kieszen equ 1152pmadres equ $800zn equ zero+2sp equ zero+4tl  } equ zero+6def equ zero+8__zero equ zero+$a_memory equ zero+$c_table equ $500  }table equ $600 뛛*kieszen+* 0 - dyskietki* 1 - naboje* 2 - paliwo* 3 - niesmiert }elnosch2 equ * jsr _pmbclear jsr $7fb0 lda 53279  } cmp #6 bne *-5 lda #64 sta 54286 lda #0 sta 559} lda #$40 jsr m_init lda #255 sta zwolnij+4 jsr }_uzup lda #0 sta kieszen sta kieszen+1 sta kieszen+5 } sta kieszen+4 lda #$16 sta kieszen+2 lda #0 sta zwolnij+3 } ldx #0 txa sta _service_nr,x inx cpx #13 } bne *-6 lda #$71 ldx #100 sta _pos_Y stx _pos_X } jsr play_the_game jmp h2game_over equ * lda #0 ldx #2 } jsr m_init jsr _pmbclear lda go_disp } sta 561 lda #$b4 sta 756 lda #$d6 sta 708 } lda #$5a sta 709 lda #$4f sta 710 lda 644 bne} *-3 rtswinner equ * lda #0 ldx #1 jsr m_init } jsr _pmbclear lda fi_disp sta 561 } lda #$b4 sta 756 lda #$d6 sta 708 lda #$7a } sta 709 lda #$6f sta 710 lda 644 bne *-3 }rtsplay_the_game equ * jsr _pmbclear jsr _makemask jsr _maketable } lda kieszen+6 beq *+13 jsr 1160 lda kieszen+6 eor #255 } sta kieszen+6 ldx fx_adr lda #$70 jsr m_}init lda #0 tax jsr m_init lda <$8700+1 sta real}s lda >$8700+1 sta reals+1 lda #3 sta 730 lda #$ }76 sta 704 lda #$78 sta 705 lda #$5f sta 706 !} lda #$a4 sta 708 lda #$6a sta 709 lda #$1f "} sta 710 lda #2 sta 707 lda #12 sta 711 lda 623#} ora #%00010001 sta 623 lda >pmadres sta 54279 lda$} #3 sta 53277 lda 20 cmp 20 beq *-2 lda #255 %} sta _service_nr sta spnr jsr _newwsp jsr init jsr tran&}slacja lda #1 sta tempo lda #2 ldx #0 sta zebrata'}ble,x inx cpx #46 bne *-6 lda #$40 sta zegar+1 (} lda #$00 sta zegar+2 ldx >nmir ldy }pmXY jsr pociski rts_lot jsr _air_hero jsr _pmXY rts?}licz dta b(0)licz2 dta b(0)_ruch equ * lda #0 sta 77 @} jsr _zapora ldy #0lo_op2 lda screen,y jsr _poziomazapora lda scA}reen,y jsr _dzialka lda screen,y jsr _pociski lda screen,y B} jsr _wlwyl iny iny bne lo_op2 rts_poziomazapora equ *C}czestpradu equ 6 cmp #pusty beq _pozwl cmp #pozzap bne _wexD} lda screen-2,y cmp #pozpradnica beq _pozwyl cmp #pusty E} bne _wex lda #pusty jmp wyswietl_wex rts_pozwyl lda 53770 F} cmp #czestpradu bcs _wex lda #pusty jmp wyswietl_pozwl lda screeG}n-2,y cmp #pozpradnica beq _poz2wl cmp #pozzap bne _wex H} lda #pozzap jmp wyswietl_poz2wl lda 53770 cmp #czestpradu bcs _wI}ex lda #pozzap jmp wyswietl_pociski equ * cmp J}#52 beq _poc2p cmp #54 beq _poc1p cmp #58 beq _pocK}l1 cmp #56 beq _pocl2 cmp #68 beq _poc3p cmp #poclL}w3 beq _poc3l pha lda kieszen+6 beq *+4 pla M} rts pla cmp #70 beq _poc3g cmp #60 beq N}_poc1g cmp #62 beq _poc2g rts_poc3g lda #60 jmp wyswietO}l_poc1g lda #62 jmp wyswietl_poc3p lda #prkraj jmp wyswietl_poc2p P}lda #54 jmp wyswietl_poc1p lda #pusty jsr wyswietl lda screen+2,y Q} cmp #pusty beq _pop21 cmp #prkraj beq _pop22 rts_popR}22 iny iny lda #68 jmp wyswietl_pop21 iny iny S} lda #52 jmp wyswietl_pocl1 lda #56 jmp wyswietl_pocl2 lda #puT}sty jsr wyswietl lda screen-2,y cmp #pusty beq _pol21 U} cmp #lwkraj beq _pol22 rts_pol21 lda #58 sta screen-2,y V} ora #1 sta screen-1,y rts_poc3l lda #lwkraj jmp wyswietl_pol22 W} lda #poclw3 sta screen-2,y ora #1 sta screen-1,y rts_pocX}2g lda #pusty jsr wyswietl lda screen+32,y cmp #pusty beqY} _pog22 rts_pog22 lda #70 sta screen+32,y ora #1 sta scrZ}een+33,y rts렠_dzialka equ * [} cmp #50 beq _lewd cmp #48 beq _prawd pha lda k\}ieszen+6 beq *+4 pla rts pla cmp #64 ]} beq _gordzi rts_lewd equ * lda screen-2,y cmp #pusty ^} beq *+3 rts lda 53770 cmp #5 bcs *-6 lda #58 _} sta screen-2,y ora #1 sta screen-1,y lda zwolnij+4 b`}ne *+11 lda #$20 ldx #30 ldy #13 jsr m_init rtsa}_prawd equ * lda screen+2,y cmp #pusty beq *+3 rts b} lda 53770 cmp #10 bcs *-6 lda #52 iny inc}y jsr wyswietl lda zwolnij+4 bne *+11 lda #$20 ldd}x #30 ldy #13 jsr m_init rts_gordzi equ * lda screen+32e},y cmp #pusty beq *+3 rts lda 53770 cmp #10 f} bcs *-6 lda #70 sta screen+32,y ora #1 sta screen+33,yg} lda zwolnij+4 bne *+11 lda #$20 ldx #30 ldy #13 h} jsr m_init rts㛛ꛪꛛ_wlwyl equ *i} cmp #zapora beq _wylacz cmp kieszen+7 bne _wlwex j} lda screen-32,y cmp #pradnica beq _prad cmp #zapora bne _wlwexk} lda #zapora jmp wyswietl_prad lda 53770 cmp #czestpradu l} bcs _wlwex lda #zapora jmp wyswietl_wlwex rts_wylacz equ * m}lda screen-32,y cmp #pradnica beq _pradoff cmp kieszen+7 bne _wlwn}ex lda kieszen+7 jmp wyswietl_pradoff lda 53770 cmp #czestpradu o} bcs _wlwex lda kieszen+7 jmp wyswietl_zapora equ * pha p} txa pha tya pha inc _zapkontrol ldy _zapkoq}ntrol cpy #4 bne _zaplop ldy #0 sty _zapkontrol_zaplop ldr}a fzzap,y tay ldx #0_zaplp lda pozdan,y sta zapznk,xwp2 ldas} poz2dan,y sta zapznk+1024,x lda pindan,y sta zaiznk,x lda pin2dat}n,y sta zaiznk+1024,x lda koddoor,y sta ldorznk,x lda kod2door,yu} sta ldorznk+1024,x lda lasdoor,y sta lasznk,x sta lasznk+1024,x v} lda 53770 and #%01010101 sta telp,x lda 53770 and #w}%01010101 sta telp+1024,x iny inx cpx #16 bne _zax}plp pla tay pla tax pla rts_zap_y}rozpoznaj equ * dec reals+1 ldy #255 lda (reals),y inc reals+1 and #%00000100 beq _s_k ldz}a #0 sta kieszen+7 lda kosmozap sta _zaplp+2 sta wp2{}+2 rts_s_k lda #16 sta kieszen+7 lda po|}zdan sta _zaplp+2 lda >poz2dan sta wp2+2 rts icl 'ATP_CD' icl 'D:DANE_ATP.}}ASM' icl 'D:SPRITE2' icl 'D:BOHATER.ASM' icl 'D:AIR_FIR4.ASM' icl~} 'D:DANE3.ASM' icl 'D:DANE5_SP' icl 'D:GAMEFONT.ASM' icl 'INFOFONT' } org $8500fuel equ * dta b(0),b(39),b(159),b(124),b(255),b(255),b(245),b(247) dta b(0),b(192),b(240}),b(60),b(12),b(204),b(124),b(252) dta b(245),b(247),b(247),b(247),b(254),b(251),b(46),b(0) dta b(248),b(252),b(232}),b(184),b(236),b(232),b(160),b(0)micro equ * dta b(165),b(165),b(64),b(15),b(63),b(14),b(14),b(58) dta} b(80),b(84),b(0),b(224),b(172),b(160),b(160),b(172) dta b(10),b(10),b(58),b(10),b(10),b(58),b(10),b(2) dta b(160),}b(160),b(172),b(160),b(160),b(172),b(160) dta b(128)bron equ * dta b(165),b(165),b(1),b(32),b(255),b(2}54),b(234),b(0) dta b(80),b(84),b(64),b(4),b(214),b(106),b(170),b(170) dta b(80),b(84),b(80),b(68),b(16),b(68),b(16}),b(0) dta b(42),b(42),b(42),b(42),b(42),b(72),b(16),b(0)dysk equ * dta b(0),b(255),b(238),b(238),b(255}),b(170),b(164),b(160) dta b(0),b(232),b(232),b(228),b(232),b(168),b(104),b(40) dta b(164),b(169),b(168),b(168),b(1}68),b(170),b(0),b(0) dta b(104),b(136),b(168),b(168),b(168),b(168),b(0),b(0)unkill equ * dta b(165),b(14}9),b(85),b(85),b(80),b(1),b(81),b(114) dta b(80),b(84),b(80),b(68),b(16),b(0),b(20),b(52) dta b(2),b(3),b(111),b(3)},b(2),b(114),b(81),b(1) dta d' ',b(228),d' ',b(52),b(20),b(0)supra equ * dta b(164),b(148),b(84),b(80}poczatek equ $4900 org poczatek opt %0100101* --- --- *dliv equ 512}dmactls equ 559dlist equ 560nmien equ 54286wsync equ 54282vcount equ 54283chba}se equ 54281* --- --- *infofont equ $b400fonts equ $b800* --- --- *zero e}qu $f0reals equ zero *wyrazpusty equ 16prkraj equ 24poclw3 equ 66lwkraj equ 20zapora equ 38}pradnica equ 74pozzap equ 76pozpradnica equ 78modul equ $3400fx_adr equ $3bc2m_init equ modul+3m_tact } equ modul+6kieszen equ 1152pmadres equ $800zn equ zero+2sp equ zero+4tl } equ zero+6def equ zero+8__zero equ zero+$a_memory equ zero+$c_table equ $500 }table equ $600 뛛*kieszen+* 0 - dyskietki* 1 - naboje* 2 - paliwo* 3 - niesmiert}elnosch2 equ * jsr _pmbclear jsr $7fb0 lda 53279 } cmp #6 bne *-5 lda #64 sta 54286 lda #0 sta 559} lda #$40 jsr m_init lda #255 sta zwolnij+4 jsr }_uzup lda #0 sta kieszen sta kieszen+1 sta kieszen+5 } sta kieszen+4 lda #$14 sta kieszen+2 lda #0 sta zwolnij+3 } ldx #0 txa sta _service_nr,x inx cpx #13 } bne *-6 lda #$71 ldx #100 sta _pos_Y stx _pos_X } jsr play_the_game jmp h2game_over equ * lda #0 ldx #2 } jsr m_init jsr _pmbclear lda go_disp } sta 561 lda #$b4 sta 756 lda #$d6 sta 708 } lda #$5a sta 709 lda #$4f sta 710 lda 644 bne} *-3 rtswinner equ * lda #0 ldx #1 jsr m_init } jsr _pmbclear lda fi_disp sta 561 } lda #$b4 sta 756 lda #$d6 sta 708 lda #$7a } sta 709 lda #$6f sta 710 lda 644 bne *-3 }rtsplay_the_game equ * jsr _pmbclear jsr _makemask jsr _maketable } lda kieszen+6 beq *+13 jsr 1160 lda kieszen+6 eor #255 } sta kieszen+6 ldx fx_adr lda #$70 jsr m_}init lda #0 tax jsr m_init lda <$8700+1 sta real}s lda >$8700+1 sta reals+1 lda #3 sta 730 lda #$}76 sta 704 lda #$78 sta 705 lda #$5f sta 706 } lda #$a4 sta 708 lda #$6a sta 709 lda #$1f } sta 710 lda #2 sta 707 lda #12 sta 711 lda 623} ora #%00010001 sta 623 lda >pmadres sta 54279 lda} #3 sta 53277 lda 20 cmp 20 beq *-2 lda #255 } sta _service_nr sta spnr jsr _newwsp jsr init jsr tran}slacja lda #1 sta tempo lda #2 ldx #0 sta zebrata}ble,x inx cpx #46 bne *-6 lda #$40 sta zegar+1 } lda #$00 sta zegar+2 ldx >nmir ldy kosmozap sta _zap}lp+2 sta wp2+2 rts_s_k lda #16 sta kieszen+7 lda pozdan sta _zaplp+2 lda >poz2dan sta wp2+2 rts icl 'ATP_CD' } icl 'D:DANE_ATP.ASM' icl 'D:SPRITE2' icl 'D:BOHATER.ASM' icl 'D:AIR_FIR4.ASM' } icl 'D:DANE3.ASM' icl 'D:DANE5_SP' icl 'D:GAMEFONT.ASM' icl 'INFOF}ONT' org $8500fuel equ * dta b(0),b(39),b(159),b(124),b(255),b(255),b(245),b(247) dta }b(0),b(192),b(240),b(60),b(12),b(204),b(124),b(252) dta b(245),b(247),b(247),b(247),b(254),b(251),b(46),b(0) dta b( }248),b(252),b(232),b(184),b(236),b(232),b(160),b(0)micro equ * dta b(165),b(165),b(64),b(15),b(63),b(14),b(1 }4),b(58) dta b(80),b(84),b(0),b(224),b(172),b(160),b(160),b(172) dta b(10),b(10),b(58),b(10),b(10),b(58),b(10),b(2) } dta b(160),b(160),b(172),b(160),b(160),b(172),b(160) dta b(128)bron equ * dta b(165),b(165),b(1) },b(32),b(255),b(254),b(234),b(0) dta b(80),b(84),b(64),b(4),b(214),b(106),b(170),b(170) dta b(80),b(84),b(80),b(68) },b(16),b(68),b(16),b(0) dta b(42),b(42),b(42),b(42),b(42),b(72),b(16),b(0)dysk equ * dta b(0),b(255),b(}238),b(238),b(255),b(170),b(164),b(160) dta b(0),b(232),b(232),b(228),b(232),b(168),b(104),b(40) dta b(164),b(169),}b(168),b(168),b(168),b(170),b(0),b(0) dta b(104),b(136),b(168),b(168),b(168),b(168),b(0),b(0)unkill equ * } dta b(165),b(149),b(85),b(85),b(80),b(1),b(81),b(114) dta b(80),b(84),b(80),b(68),b(16),b(0),b(20),b(52) dta b(2)}poczatek equ $4900 org poczatek opt %0100101* --- --- *dliv equ 512 }dmactls equ 559dlist equ 560nmien equ 54286wsync equ 54282vcount equ 54283chba }se equ 54281* --- --- *infofont equ $b400fonts equ $b800* --- --- *zero e }qu $f0reals equ zero *wyrazpusty equ 16prkraj equ 24poclw3 equ 66lwkraj equ 20zapora equ 38 }pradnica equ 74pozzap equ 76pozpradnica equ 78modul equ $3400fx_adr equ $3bc2m_init equ modul+3m_tact } equ modul+6kieszen equ 1152pmadres equ $800zn equ zero+2sp equ zero+4tl } equ zero+6def equ zero+8__zero equ zero+$a_memory equ zero+$c_table equ $500 }table equ $600 뛛*kieszen+* 0 - dyskietki* 1 - naboje* 2 - paliwo* 3 - niesmiert }elnosch2 equ * jsr _pmbclear jsr $7fb0 lda 53279 } cmp #6 bne *-5 lda #64 sta 54286 lda #0 sta 559 } lda #$40 jsr m_init lda #255 sta zwolnij+4 jsr }_uzup lda #0 sta kieszen sta kieszen+1 sta kieszen+5 } lda #$14 sta kieszen+2 sta kieszen+4 lda #0 sta zwolnij+3 } ldx #0 txa sta _service_nr,x inx cpx #13 } bne *-6 lda #$71 ldx #100 sta _pos_Y stx _pos_X } jsr play_the_game jmp h2game_over equ * lda #0 ldx #2 !} jsr m_init jsr _pmbclear lda go_disp "} sta 561 lda #$b4 sta 756 lda #$d6 sta 708 #} lda #$5a sta 709 lda #$4f sta 710 lda 644 bne $} *-3 rtswinner equ * lda #0 ldx #1 jsr m_init %} jsr _pmbclear lda fi_disp sta 561 &} lda #$b4 sta 756 lda #$d6 sta 708 lda #$7a '} sta 709 lda #$6f sta 710 lda 644 bne *-3 (}rtsplay_the_game equ * jsr _pmbclear jsr _makemask jsr _maketable )} lda kieszen+6 beq *+13 jsr 1160 lda kieszen+6 eor #255 *} sta kieszen+6 ldx fx_adr lda #$70 jsr m_ +}init lda #0 tax jsr m_init lda <$8700+1 ,} sta reals lda >$8700+1 sta reals+1 lda #3 sta 730 -} lda #$76 sta 704 lda #$78 sta 705 lda #$5f .} sta 706 lda #$a4 sta 708 lda #$6a sta 709 lda #$ /}1f sta 710 lda #2 sta 707 lda #12 sta 711 0} lda 623 ora #%00010001 sta 623 lda >pmadres sta 54279 1} lda #3 sta 53277 lda 20 cmp 20 beq *-2 2} lda #255 sta _service_nr sta spnr jsr _newwsp jsr init 3} jsr translacja lda #1 sta tempo lda #2 ldx #0 4} sta zebratable,x inx cpx #46 bne *-6 lda #$40 5}sta zegar+1 lda #$00 sta zegar+2 ldx >nmir ldy }linia,x cmp #1 beq dd cmp #2 beq dd cmp #3 ?} beq dd cmp #4 beq dd inx cpx #128 bne *-22 @} jsr game_over rts nop nop nop nop A} dta d' 'dd equ * lda 764 cmp #28 bne *+5 B} jmp game_over cmp #33 bne *+5 jsr levels jsr _zap_rozpoznaj C} ldx #0 * jsr _opn_door * jsr _inf jsr _p_prog D} jmp _change_p_prog jsr _zm jsr _movemissile jsr _miskolision E} lda opoznienie beq *+5 dec opoznienie inc licz lda licz2 F} eor #255 sta licz2 bne *+5 jsr _luup lda licz G} cmp #3 beq *+3 rts lda #0 sta licz js H}r _ruch rtsnmir jsr dli_on jmp nmi_luup lda _fz05 eor #2 I}55 sta _fz05 lda kieszen+3 bne _luup3 lda #2 sta J}707 jmp _luup2_luup3 inc 707 dec kieszen+3_luup2 lda _service_nr K} beq _lot jsr _joystick jsr _main jsr _pmXY jsr pociski L} rts_lot jsr _air_hero jsr _pmXY rtslicz dta b(0)licz2 M} dta b(0)_ruch equ * lda #0 sta 77 jsr _zapora ldy N}#0lo_op2 lda screen,y jsr _poziomazapora lda screen,y jsr _dzialka O} lda screen,y jsr _pociski lda screen,y jsr _wlwyl iny P} iny bne lo_op2 rts_poziomazapora equ *czestpradu equ 6 Q}cmp #pusty beq _pozwl cmp #pozzap bne _wex lda screen-2,y R} cmp #pozpradnica beq _pozwyl cmp #pusty bne _wex lda #pu S}sty jmp wyswietl_wex rts_pozwyl lda 53770 cmp #czestpradu b T}cs _wex lda #pusty jmp wyswietl_pozwl lda screen-2,y cmp #pozpradnica U} beq _poz2wl cmp #pozzap bne _wex lda #pozzap jmp V}wyswietl_poz2wl lda 53770 cmp #czestpradu bcs _wex lda #pozzap W} jmp wyswietl_pociski equ * cmp #52 beq _poc2p X} cmp #54 beq _poc1p cmp #58 beq _pocl1 cmp #56 Y} beq _pocl2 cmp #68 beq _poc3p cmp #poclw3 beq _poc3l Z} pha lda kieszen+6 beq *+4 pla rts pla [} cmp #70 beq _poc3g cmp #60 beq _poc1g cmp #62 \} beq _poc2g rts_poc3g lda #60 jmp wyswietl_poc1g lda #62 ]} jmp wyswietl_poc3p lda #prkraj jmp wyswietl_poc2p lda #54 jmp wyswietl_ ^}poc1p lda #pusty jsr wyswietl lda screen+2,y cmp #pusty b _}eq _pop21 cmp #prkraj beq _pop22 rts_pop22 iny iny `} lda #68 jmp wyswietl_pop21 iny iny lda #52 j a}mp wyswietl_pocl1 lda #56 jmp wyswietl_pocl2 lda #pusty jsr wyswietl b} lda screen-2,y cmp #pusty beq _pol21 cmp #lwkraj beq _po c}l22 rts_pol21 lda #58 sta screen-2,y ora #1 sta screen-1 d},y rts_poc3l lda #lwkraj jmp wyswietl_pol22 lda #poclw3 sta e}screen-2,y ora #1 sta screen-1,y rts_poc2g lda #pusty j f}sr wyswietl lda screen+32,y cmp #pusty beq _pog22 rts_pog22 g} lda #70 sta screen+32,y ora #1 sta screen+33,y rts q}"AROUNDT3ASMBAROUNDT4ASMCAROUNDT5ASMyLV1_38 ASMgLV39_68 ASM DOORTABLASMWLV1_38 OBJBAROUNDT2ASMCAROUNDT5ASMAROUNDT5ASM렠_dzialka equ * cmp #50 beq _lewd r} cmp #48 beq _prawd pha lda kieszen+6 beq *+4 s} pla rts pla cmp #64 beq _gordzi rts_lew t}d equ * lda screen-2,y cmp #pusty beq *+3 rts u} lda 53770 cmp #5 bcs *-6 lda #58 sta screen-2,y v} ora #1 sta screen-1,y lda zwolnij+4 bne *+11 lda #$20 w} ldx #30 ldy #13 jsr m_init rts_prawd equ * l x}da screen+2,y cmp #pusty beq *+3 rts lda 53770 cmp y} #10 bcs *-6 lda #52 iny iny jsr wyswietl z} lda zwolnij+4 bne *+11 lda #$20 ldx #30 ldy #13 {} jsr m_init rts_gordzi equ * lda screen+32,y cmp #pusty |} beq *+3 rts lda 53770 cmp #10 bcs *-6 lda #7 }}0 sta screen+32,y ora #1 sta screen+33,y lda zwolnij+4 ~} bne *+11 lda #$20 ldx #30 ldy #13 jsr m_init }ꛪꛛ_wlwyl equ * cmp #zapora beq _wylacz cmp kieszen+7 } bne _wlwex lda screen-32,y cmp #pradnica beq _prad }poczatek equ $4900 org poczatek opt %0100101* --- --- *dliv equ 512%}dmactls equ 559dlist equ 560nmien equ 54286wsync equ 54282vcount equ 54283chba%}se equ 54281* --- --- *infofont equ $b400fonts equ $b800* --- --- *zero e%}qu $f0reals equ zero *wyrazpusty equ 16prkraj equ 24poclw3 equ 66lwkraj equ 20zapora equ 38%}pradnica equ 74pozzap equ 76pozpradnica equ 78modul equ $3400fx_adr equ $3bc2m_init equ modul+3m_tact %} equ modul+6kieszen equ 1152pmadres equ $800zn equ zero+2sp equ zero+4tl %} equ zero+6def equ zero+8__zero equ zero+$a_memory equ zero+$c_table equ $500 %}table equ $600 뛛*kieszen+* 0 - dyskietki* 1 - naboje* 2 - paliwo* 3 - niesmiert%}elnosch2 equ * jsr _pmbclear jsr $7fb0 lda 53279 %} cmp #6 bne *-5 lda #64 sta 54286 lda #0 sta 559%} lda #$40 jsr m_init lda #255 sta zwolnij+4 jsr %}_uzup lda #0 sta kieszen sta kieszen+1 sta kieszen+5 %} sta kieszen+4 lda #$14 sta kieszen+2 lda #0 sta zwolnij+3 %} ldx #0 txa sta _service_nr,x inx cpx #13 %} bne *-6 lda #$71 ldx #100 sta _pos_Y stx _pos_X %} jsr play_the_game jmp h2game_over equ * lda #0 ldx #2 %} jsr m_init jsr _pmbclear lda go_disp %} sta 561 lda #$b4 sta 756 lda #$d6 sta 708 %} lda #$5a sta 709 lda #$4f sta 710 lda 644 bne%} *-3 rtswinner equ * lda #0 ldx #1 jsr m_init %} jsr _pmbclear lda fi_disp sta 561 %} lda #$b4 sta 756 lda #$d6 sta 708 lda #$7a %} sta 709 lda #$6f sta 710 lda 644 bne *-3 %}rtsplay_the_game equ * jsr _pmbclear jsr _makemask jsr _maketable %} lda kieszen+6 beq *+13 jsr 1160 lda kieszen+6 eor #255 %} sta kieszen+6 ldx fx_adr lda #$70 jsr m_%}init lda #0 tax jsr m_init lda <$8700+1 sta real%}s lda >$8700+1 sta reals+1 lda #3 sta 730 lda #$%}76 sta 704 lda #$78 sta 705 lda #$5f sta 706 %} lda #$a4 sta 708 lda #$6a sta 709 lda #$1f %} sta 710 lda #2 sta 707 lda #12 sta 711 lda 623%} ora #%00010001 sta 623 lda >pmadres sta 54279 lda%} #3 sta 53277 lda 20 cmp 20 beq *-2 lda #255 %} sta _service_nr sta spnr jsr _newwsp jsr init jsr tran'u}),b(67),b(8),b(60),b(250) dta b(60),b(250),b(233),b(164),b(16),b(48),b(48),b(36) dta b(233),b(36),b(3),b(64),b(16),}b(68),b(16),b(0) dta b(24),b(12),b(12),b(196),b(60),b(250),b(233),b(36)energy equ * dta b(31),b(122),b(2}29),b(229),b(230),b(230),b(230),b(229) dta b(240),b(168),b(89),b(89),b(169),b(169),b(169),b(105) dta b(229),b(230),}b(230),b(230),b(229),b(229),b(106),b(21) dta b(105),b(169),b(169),b(169),b(89),b(89),b(168),b(80) org $2}e0 dta a(poczatek)b(21) dta b(105),b(169),b(169),b(169),b(89),b(89),b(168),b(80) org $2#,b(3),b(111),b(3),b(2),b(114),b(81),b(1) dta d' ',b(228),d' ',b(52),b(20),b(0)supra equ * dta b(164),}b(148),b(84),b(80),b(67),b(8),b(60),b(250) dta b(60),b(250),b(233),b(164),b(16),b(48),b(48),b(36) dta b(233),b(36),}b(3),b(64),b(16),b(68),b(16),b(0) dta b(24),b(12),b(12),b(196),b(60),b(250),b(233),b(36)energy equ * dta} b(31),b(122),b(229),b(229),b(230),b(230),b(230),b(229) dta b(240),b(168),b(89),b(89),b(169),b(169),b(169),b(105) d}ta b(229),b(230),b(230),b(230),b(229),b(229),b(106),b(21) dta b(105),b(169),b(169),b(169),b(89),b(89),b(168),b(80) } org $2e0 dta a(poczatek)b(21) dta b(105),b(169),b(169),b(169),b(89),b(89),b(168),b(80) 4d'<< LL L LL LLLL ' dta d'<< H LL L L L' dta d'<BN' dta d'22222022220 L' dta d'00 }000000000 H L ' dta d'00008"" ' dta d'  ' dta a(lv9),a(lv7),a(lv8),a(lv8) dta d' ',b(100 }),b(96),b(120),b(0),b(%00001101) dta d' ',b(20),b(0),b(80),b(68),b(%00011010) dta b(1)lv9 equ * dta } d'&L L &&&' dta d'& L L L L L ' dta d'&  L H  H' dta d'  ' dta d'&6222222022202 }22' dta d'&400000000000000' dta d'J408&48&&400' dta d'J408JJ JJ' dta a(lv9),a(lv8),a(lv13),a(lv10) }dta d' ',b(45),b(40),b(80),b(34),b(%00001010) dta d' ',b(74),b(72),b(88),b(68),b(%00011101) dta b(1)lv10 } equ * dta d' "408& L L L ' dta d' "408& L L H ' dta d' "408&' dta d'J40022222:" L ' dta } d'"P000000008JLLL' dta d'208&4000000R" H' dta d'00020000008J <<' dta d'<<<<<<<<<<<<<<<<' dta a(lv11),a(lv10), }a(lv9),a(lv10) dta d' ',b(20),b(17),b(31),b(85),b(%00001010) dta d' ',b(70),b(0),b(79),b(34),b(%00011110) dta } b(3)lv11 equ * dta d'L L LL LL LLL LL' dta d' H L L LLL L ' dta d'J "J L L L H ' dta d'2202:" } L L L ' dta d'00008"J J J "' dta d'0000022202202202' dta d'0000000000000000' dta d'<<<<<<<<<<<<<<<<' dta } a(lv12),a(lv10),a(lv11),a(lv11) dta d' ',b(30),b(24),b(48),b(68),b(%00011110) dta b(1)lv12 equ * dt }a d'<<<<<<<<<<<<<<< ' dta d'<<6222222222:<<<' dta d'<<40000000008< <' dta d'<<<<<40000000202' dta d'L LLH<<<<4000 }000' dta d' L LL H <4000000' dta d'L H LL L<4000000' dta d' L LL LL<<<<<<<<' dta a(lv12),a(lv11),a(lv12),a(lv12) } dta d' ',b(50),b(40),b(88),b(85),b(%00001010) dta d' ',b(74),b(72),b(96),b(85),b(%00011100) dta b(2)lv13 } equ * dta d'L L L L L H L ' dta d'<<<<< <<<<<<<<<<' dta d'2222202222222:J' dta d'00000000000008J' }dta d'>BNBNBNBNB@408J' dta d'&6222222222008J' dta d'&4000000000000R<' dta d'&4008' dta a(lv14),a(lv1 }3),a(lv13),a(lv9) dta d' ',b(90),b(88),b(104),b(17),b(%00011011) dta b(1)lv14 equ * dta d'L L L L L }LLH ' dta d'<<< <<< <<<< <<<' dta d'2220222002220222' dta d'0000000000000000' dta d'BNBNBNBNBNBNBNBN' dta d' }L L L L LL' dta d' L H L L LL L' dta d'L LL LLL LL L ' dta a(lv15),a(lv13),a(lv14),a(lv14) dta d' ' },b(2),b(0),b(15),b(34),b(%00001011) dta d' ',b(80),b(64),b(88),b(34),b(%00011011) dta b(3)lv15 equ * } dta d'JJJJJJ H ' dta d'JJJJ JJ J' dta d'J62^22202222022' dta d'J,(*00000000000' dta d'"P0008>BNB }NBNBNB' dta d'J4000222:<< H L' dta d'"P00000000R< LH' dta d'J40000008<BN@<<>BN' dta d'L L L H L L ' dta d' L H H LL L L ' dta d'' }dta a(lv23),a(lv21),a(lv22),a(lv22) dta d' ',b(60),b(57),b(79),b(34),b(%00001011) dta d' ',b(99),b(1),b(119),b(85 }),b(%00001010) dta d' ',b(70),b(21),b(99),b(68),b(%00011110) dta b(1+4)lv23 equ * dta d'J JJ" }' dta d'L L L L H L L' dta d' L LLH L L ' dta d' LH L L HLL' dta d'L >BN@B' dta d'L L <<40.00008<<' dta a(lv34),a(lv}35),a(lv34),a(lv33) dta d' ',b(80),b(72),b(104),b(17),b(%00011100) dta b(3)lv35 equ * dta d'H&}&L' dta d' & L LLL LL L & ' dta d'  ' dta d'222^202222022222' dta d'(((*000000000000' dta }d'0000000000000000' dta d'BNBN@<>NBNBN@<>B' dta d'L LL H LL L L ' dta a(lv34),a(lv36),a(lv35),a(lv35) dta d' } ',b(60),b(56),b(64),b(34),b(%00011101) dta b(3)lv36 equ * dta d'LL L L LL LL L ' dta d' H L LL L }L ' dta d'  L H' dta d'22220222022<< L ' dta d'00000000008<}9),b(71),b(0),b(%00011101) dta b(1)lv48 equ * dta d'H L&& LLHL' dta d'LL $LH LL$L LL ' dta d'?} H $ LL L &&' dta d'LLL$L << LL LL L' dta d'< <& << H LLHL ' dta d'202 LL<< L L &' dta d'000L <BNBN' dta d'L$L <<,*00022222' dta d'L$LH*@  }0"."."."."*@(,02,(*@(,鎄PH`D*@,,02*@}*@2FFFFFFFFFF( HDFF,,(,(,,,,,,,(,},(,((TVH,,,(,FFFFFFFF*@,,,,,,,(,,(,,,,,,FFFFFFFFFFFFF*@LD}<1FD1,,FFFFFFF(,,,(,,,,,,,,,,,FFFF,,,,,,(,(,,,},(,,,,(FFFL   <0dZ@g",,,((\Z(,,,,,},,FFF,,((,(,,,,,,L   F@hU,(,,}(,\ZFFFFFF,,,,,,(,,(,(,,8 8U }PHp,,,(,,,,,(,,(".".".". ,,,,,,,,FFFF}FFFFFFFFFFFFܓ88 U 2XPHXUFFFFFFFFFFFFFF,,((,,,,,,,,,,,,,".". ". }".,,,(,,,((,,,,FFFFFFFFFFFFFFFF8ܓܓ<9O" cwU FcD*J*@*@FFFFFFFFF,,,,(,,,},,(,,,(,,(,,,". ". ".".,,,,,,,,,,FFFFFFFFFFܓx F@PD(,(},FF,,,,(,((FFFFFFF,,,,,FFFF,,,,,(,,,(FFFFFFFFFFFFFFFF}F@HD jhp"(,,,,,,,,(,FFF(,,,,,(,FFFFF,,,,,},(,,(,(Z4LU P8` ZHxUFF*@FFFFF,,,,(,,,,,,JFFFFFFF,,,,,,,,,}". ,,,,,,,,(\XXXXXZFF,,,,(,FFFFFFFFFFFFFFFZZ D Z@sdPhFFJJFFFFFFFFFF,,},,,,((,,,,,,,,,,,,,,,".".".".".",,,,,,,,,,,,,FFFFFFFFFFFFFFFFZZ8hU P}@sD(((,,,,,".".". ((,(,(,FFFFF((,,,,,,,,(,}FFFFFF 0" d`x((,(,,,\XXXZ,(,,(\XZ,(,,},(,(,,,,((,(,44ᘶ2(8D ZHh F8Z "(,(,,,,(JFFF},,,,,,,(((,,(,,,(ᘅ4   ( @ d@hFF}FFFFFFFFFFFFF,(,,,,,,,,(,(,(,,,,,,,,,,,,,(,,,,\X})H ZUs" F0HFFFFFFF,(,,,,,,,>P  R*@R}R\XXXXXXXXXXXXXXZ͚)) (" 1U ZPiD,(  }2@*J*@*@J@*@*@*@*@2\XZ\XXXXXXXZ)͚_PHh,,FFF,,(FFFFF(,,,,,},,,\XXXXXXZ\XXX(>,  , FFF>",,__͚PHh(FFFFFF}FFFFFF,,,,,,,,XXXXZJ\XXZJ\XXXX> ".". .".". ",,,(,,,,_}<8@",,,,,,,,,(,,,,,XXXZJ\XZJ\XXZ,(,,,((".".".".".". ,},,,,,,,,񛃜 ,,,,,\Z,,0TVHTVH,\ZFFFJFF(,>>  },,  ,\XXXXXXXXXXXXX͚( PU,,,(,,(,,,(,,(,,,,(,,,(,,,,,,TVH,TVHTVH(FJFFJFFFJF}FFFFFXXXXXZ\XXXXB#!' PIW(,,,,(}FFF  > XXXXXXXXXXXXXXXZBB(!?U ZQgU (WD(},,,(,,,(,,,,,,(,,,,,,(,,,,FFFFFFFFFFFF(,,,,,,,(,,,,,,P,,(,>R,(,,,R,,,,}xB(!?U(,,(,,,,,(,,,,,,,,(,,,FFFFFFFFFFFFF,,,(,(,,,FFFFFFF,(,,,,,,,(,,,,,,,},,FFFFFFFFFFFxxdagD PW"(,,(,,,,,,(,,,,,,(,,,,FFFJ,,,,,(,,(,,,,,,(,,(},,,,,,,,,,,,,FFFFFFFF(x*)/" FAG" ZY_" 2)_U(,(,(,(,,,,,,},,FFFFFFFF,,,,,,,,(,,,,,(,,(,,,,,,,,,,,,,,(F,(,,,((dgU &!'}" <9OD(,,,,,,,,,,(,,,FFFF,,,,,,,,FF(,,,,,,,FF,,(,,},,,,,dd '" ?,,,,,,,(,(,,,,,,,,(,,,,,,,,(,(FFFFF}FFF,,,,,,,,,,,(,,,(,,,,dXQwD ZI_U7U(,,,,,,,,,(,,,,JFFFF},,,(,,,,,FFFFF,,,,,,,,,,(,,,,,,,,,(,,(,,(,,,KdIoD nio"  7U(}FFFPFFFFFFF,R,,,,,R,,(,,,(R,,,FFF,,,,,,,,,(,,(,,,,(,,,,,,,},KKKdaoU F1G 21G(,FFFFFF,,(,,,,(,,,,,(,,,FFFF,,,,,,,,,J(,,(,,,},,,,,(,XXZFFFFFFFFF217" FAgU,,(,,,(J,,>, }(  ,,(0,,\XXXXXI%ZQwDKI_U(,,,,\Z,(,,,J\}Z,,(,J\Z,,,J\XXXXZ\Z(,,\Z,(,\Z,,FFFFFFFFFF\ZFFFF%%daw"(,,,},,(,,,,,,,,,,,,,,,,,,(,,,,,(,,,,(,,\XXXZJJ\,,,,,,,(,(,,,,,,,(,,,,FFFFF%}PIWUXXXXZJFFFF\XXXXZ2".".".".". XXXXXXXX>>},(,,,  II D 27"\XX>  ".".".".".".".".>}0 \XXXXXXXX,(,,(,,,,(,,I>'" FA_UJ(,,,>,,,},,".".,, ,,(0FFFF ,(,,21N P1vU,(,,,,}02,,,*@,,,,,,,02,(,,,*@,(,>>,,,,,  (,F1W}(,,,(,(,,,,,,,,(,,,,,,,,,,(,,,,(,,,(,,,,,,,,,,,,,,},,(FAW(,,,,,,,,,,,,,,,,,,(,,,,(,,,,,,,(,(,,,,},,,,,,,\XZ>>FA] "tqw"(,,,(,,,,FFF,F,,,,,,},(FF,,\Z,,,,,,,(,,,,,,,,,}><9^U PAV,FFFFFFFFFFFFF(,,,(,(,,,},,,GGGGGGGPG,,((,,R,,R,,,,,(GG,,,,}!}' A@_U 2}1wDFJFFFF,,,(,,,(,,,,(,,,,,F,JFFFFFFFF,,,,,,(,,(,,,GGG,,,FFF}FFFF}ū!!RQWD D 'U(,,,,,,,,,,,,TVH,,,TVH,(,TVHTFFFFFFFFFFFFFFFJ(,,,,(,,,,,},,,,,,,TVHTVH!iūū / FA_ 21?U(,FFFFFFFFFFJ,,(,,,,H,,(,}(,,FFFF,,,,(,,,,,,,,,,,H,,,,,,,,,,GGGGGGGGū ii<1oU VQW" ?DFJF}FFFFFFFFFFFFF(,,,,,,(,,,,,,,,,,,,,,,,,,,,GGG,,,,,,,,,FFFFFF,(}i '#'" FAG" bawDFFFFFFFFFFFFFF(,,,,,(,,(GGGGGGGGGGGGGGG,,(,,,,,},,,((,,,,,, L" dXiDFFFF,,,,,((,,,,,,,(FFF,,G,(}(,,,FFF,,,,,(,,((,,,,,FF((LL Z)_ P)w,(,FF,(,,,,,},,,,,,,,,,,(,F(,,,,FF,,(,,,,,,,,,FFFF,,,FF,,,(LU }U,,,,,FFF,,FF((,(,,(,,,,FFF(,,,,,,,FFFFF(FFFFFF,,,,,,,,,FF(FFF,(},,,,,,,,/𮋯 D 2.OU <G,,,,,,,,,,,,(,FFFF(,,,,,,,FFF,,,,,,,}FFFF,,,,,,,,,,FF,FFF(,,,,,,,(,,,,,///d`x xUd hU)K}҈i/K}􋱭͚f#fYjmO=83F7[U%j````` @|poczatek equ $4900 org poczatek opt %0100101* --- --- *dliv equ 512}dmactls equ 559dlist equ 560nmien equ 54286wsync equ 54282vcount equ 54283chba}se equ 54281* --- --- *infofont equ $b400fonts equ $b800* --- --- *zero e}qu $f0reals equ zero *wyrazpusty equ 16prkraj equ 24poclw3 equ 66lwkraj equ 20zapora equ 38}pradnica equ 74pozzap equ 76pozpradnica equ 78modul equ $3400fx_adr equ $3bc2m_init equ modul+3m_tact } equ modul+6kieszen equ 1152pmadres equ $800zn equ zero+2sp equ zero+4tl } equ zero+6def equ zero+8__zero equ zero+$a_memory equ zero+$c_table equ $500 }table equ $600 뛛*kieszen+* 0 - dyskietki* 1 - naboje* 2 - paliwo* 3 - niesmiert}elnosch2 equ * jsr _pmbclear jsr $7fb0 lda 53279 } cmp #6 bne *-5 lda #64 sta 54286 ldx fx_adr lda #$70 jsr m_init lda #0 tax jsr m_ini}t lda #255 sta zwolnij+4 jsr _uzup lda #0 sta ki}eszen sta kieszen+1 sta kieszen+5 lda #$14 sta kieszen+2 } sta kieszen+4 lda #0 sta zwolnij+3 ldx #0 txa } sta _service_nr,x inx cpx #13 bne *-6 lda #$71 } ldx #100 sta _pos_Y stx _pos_X jsr play_the_game jmp h2game_}over equ * lda #0 ldx #2 jsr m_init jsr _pmbclear } lda go_disp sta 561 lda #$b4 } sta 756 lda #$d6 sta 708 lda #$5a sta 709 } lda #$4f sta 710 lda 644 bne *-3 rtswinner equ * } lda #0 ldx #1 jsr m_init jsr _pmbclear lda fi_disp sta 561 lda #$b4 sta 756 } lda #$d6 sta 708 lda #$7a sta 709 lda #$6f } sta 710 lda 644 bne *-3 rtsplay_the_game equ * jsr _pmb}clear jsr _makemask jsr _maketable lda kieszen+6 beq *+13 } jsr 1160 lda kieszen+6 eor #255 sta kieszen+6 lda #0 } tax jsr m_init lda <$8700+1 sta reals lda >$8700+1} sta reals+1 lda #3 sta 730 lda #$76 sta 704 } lda #$78 sta 705 lda #$5f sta 706 lda #$a4 } sta 708 lda #$6a sta 709 lda #$1f sta 710 lda }#2 sta 707 lda #12 sta 711 lda 623 ora #%00010001} sta 623 lda >pmadres sta 54279 lda #3 sta 53277} jsr init jsr translacja jsr _newwsp lda #2 ldx #0 } sta zebratable,x inx cpx #46 bne *-6 lda #$40  } sta zegar+1 lda #$00 sta zegar+2 ldx >nmir ldy } beq _lewd cmp #48 beq _prawd pha lda kieszen+6 be?}q *+4 pla rts pla cmp #64 beq _gordzi @} rts_lewd equ * lda screen-2,y cmp #pusty beq *+3 rA}ts lda 53770 cmp #5 bcs *-6 lda #58 sta screen-2,yB} ora #1 sta screen-1,y lda zwolnij+4 bne *+11 ldaC} #$20 ldx #30 ldy #13 jsr m_init rts_prawd equ * D} lda screen+2,y cmp #pusty beq *+3 rts lda 53770 E} cmp #10 bcs *-6 lda #52 iny iny jsr wyswiF}etl lda zwolnij+4 bne *+11 lda #$20 ldx #30 ldy #G}13 jsr m_init rts_gordzi equ * lda screen+32,y cmp #pusH}ty beq *+3 rts lda 53770 cmp #10 bcs *-6 I} lda #70 sta screen+32,y ora #1 sta screen+33,y lda zwolnijJ}+4 bne *+11 lda #$20 ldx #30 ldy #13 jsr m_init K} rts㛛ꛪꛛ_wlwyl equ * cmp #zapoL}ra beq _wylacz cmp kieszen+7 bne _wlwex lda screen-32,y M} cmp #pradnica beq _prad cmp #zapora bne _wlwex lda #zaporaN} jmp wyswietl_prad lda 53770 cmp #czestpradu bcs _wlwex O} lda #zapora jmp wyswietl_wlwex rts_wylacz equ * lda screen-32,y P} cmp #pradnica beq _pradoff cmp kieszen+7 bne _wlwex lda kiesQ}zen+7 jmp wyswietl_pradoff lda 53770 cmp #czestpradu bcs _wlwex R} lda kieszen+7 jmp wyswietl_zapora equ * pha txa S} pha tya pha inc _zapkontrol ldy _zapkontrol cpy #T}4 bne _zaplop ldy #0 sty _zapkontrol_zaplop lda fzzap,y tU}ay ldx #0_zaplp lda pozdan,y sta zapznk,xwp2 lda poz2dan,y V}sta zapznk+1024,x lda pindan,y sta zaiznk,x lda pin2dan,y sta zaiW}znk+1024,x lda koddoor,y sta ldorznk,x lda kod2door,y sta ldorznkX}+1024,x lda lasdoor,y sta lasznk,x sta lasznk+1024,x lda 53770 Y} and #%01010101 sta telp,x lda 53770 and #%01010101 sZ}ta telp+1024,x iny inx cpx #16 bne _zaplp pla [} tay pla tax pla rts_zap_rozpoznaj equ * dec \}reals+1 ldy #255 lda (reals),y inc reals+1 and #%00000100 beq _s_k lda #0 sta kieszen+7 ]} lda kosmozap sta _zaplp+2 sta wp2+2 rts_s_k lda #16^} sta kieszen+7 lda pozdan sta _zaplp+2 _} lda >poz2dan sta wp2+2 rts icl 'ATP_CD' icl 'D:DANE_ATP.ASM' icl 'D`}:SPRITE2' icl 'D:BOHATER.ASM' icl 'D:AIR_FIR4.ASM' icl 'D:DANE3.ASM' a} icl 'D:DANE5_SP' icl 'D:GAMEFONT.ASM' icl 'INFOFONT' org $8500fuel b} equ * dta b(0),b(39),b(159),b(124),b(255),b(255),b(245),b(247) dta b(0),b(192),b(240),b(60),b(12),b(204),b(124c}),b(252) dta b(245),b(247),b(247),b(247),b(254),b(251),b(46),b(0) dta b(248),b(252),b(232),b(184),b(236),b(232),b(1d}60),b(0)micro equ * dta b(165),b(165),b(64),b(15),b(63),b(14),b(14),b(58) dta b(80),b(84),b(0),b(224),be}(172),b(160),b(160),b(172) dta b(10),b(10),b(58),b(10),b(10),b(58),b(10),b(2) dta b(160),b(160),b(172),b(160),b(160f}),b(172),b(160) dta b(128)bron equ * dta b(165),b(165),b(1),b(32),b(255),b(254),b(234),b(0) dta bg}(80),b(84),b(64),b(4),b(214),b(106),b(170),b(170) dta b(80),b(84),b(80),b(68),b(16),b(68),b(16),b(0) dta b(42),b(42h}),b(42),b(42),b(42),b(72),b(16),b(0)dysk equ * dta b(0),b(255),b(238),b(238),b(255),b(170),b(164),b(160) i} dta b(0),b(232),b(232),b(228),b(232),b(168),b(104),b(40) dta b(164),b(169),b(168),b(168),b(168),b(170),b(0),b(0) j}dta b(104),b(136),b(168),b(168),b(168),b(168),b(0),b(0)unkill equ * dta b(165),b(149),b(85),b(85),b(80),b(1),k}b(81),b(114) dta b(80),b(84),b(80),b(68),b(16),b(0),b(20),b(52) dta b(2),b(3),b(111),b(3),b(2),b(114),b(81),b(1) l} dta d' ',b(228),d' ',b(52),b(20),b(0)supra equ * dta b(164),b(148),b(84),b(80),b(67),b(8),b(60),b(250)m} dta b(60),b(250),b(233),b(164),b(16),b(48),b(48),b(36) dta b(233),b(36),b(3),b(64),b(16),b(68),b(16),b(0) dta n}b(24),b(12),b(12),b(196),b(60),b(250),b(233),b(36)energy equ * dta b(31),b(122),b(229),b(229),b(230),b(230),bo}(230),b(229) dta b(240),b(168),b(89),b(89),b(169),b(169),b(169),b(105) dta b(229),b(230),b(230),b(230),b(229),b(229p}),b(106),b(21) dta b(105),b(169),b(169),b(169),b(89),b(89),b(168),b(80) org $2e0 dta a(poq}czatek)b(21) dta b(105),b(169),b(169),b(169),b(89),b(89),b(168),b(80) org $2e0 dta a(po ta b(31),b(122),b(229),b(229),b(230),b(230),b(230),b(229) dta b(240),b(168),b(89),b(89),b(169),b(169),b(169),b(105) s} dta b(229),b(230),b(230),b(230),b(229),b(229),b(106),b(21) dta b(105),b(169),b(169),b(169),b(89),b(89),b(168),b(80) t} org $2e0 dta a(poczatek)b(21) dta b(105),b(169),b(169),b(169),b(89),b(89),b(168),b(80) 6slacja lda #1 sta tempo lda #2 ldx #0 sta zebrata'v}ble,x inx cpx #46 bne *-6 lda #$40 sta zegar+1 'w} lda #$00 sta zegar+2 ldx >nmir ldy kosmozap sta _zaplp+2 sta wp2+2 rts_s_k lda #16 sta kieszen+7 lda'} pozdan sta _zaplp+2 lda >poz2dan sta wp2'}+2 rts icl 'ATP_CD' icl 'D:DANE_ATP.ASM' icl 'D:SPRITE2' ic'}l 'D:BOHATER.ASM' icl 'D:AIR_FIR4.ASM' icl 'D:DANE3.ASM' icl 'D:DANE5_SP' '} icl 'D:GAMEFONT.ASM' icl 'INFOFONT' org $8500fuel equ * dta b(0),b('}39),b(159),b(124),b(255),b(255),b(245),b(247) dta b(0),b(192),b(240),b(60),b(12),b(204),b(124),b(252) dta b(245),b('}247),b(247),b(247),b(254),b(251),b(46),b(0) dta b(248),b(252),b(232),b(184),b(236),b(232),b(160),b(0)micro eq'}u * dta b(165),b(165),b(64),b(15),b(63),b(14),b(14),b(58) dta b(80),b(84),b(0),b(224),b(172),b(160),b(160),b(172)'} dta b(10),b(10),b(58),b(10),b(10),b(58),b(10),b(2) dta b(160),b(160),b(172),b(160),b(160),b(172),b(160) dta b('}128)bron equ * dta b(165),b(165),b(1),b(32),b(255),b(254),b(234),b(0) dta b(80),b(84),b(64),b(4),b(214'}),b(106),b(170),b(170) dta b(80),b(84),b(80),b(68),b(16),b(68),b(16),b(0) dta b(42),b(42),b(42),b(42),b(42),b(72),b'}(16),b(0)dysk equ * dta b(0),b(255),b(238),b(238),b(255),b(170),b(164),b(160) dta b(0),b(232),b(232),b('}228),b(232),b(168),b(104),b(40) dta b(164),b(169),b(168),b(168),b(168),b(170),b(0),b(0) dta b(104),b(136),b(168),b('}168),b(168),b(168),b(0),b(0)unkill equ * dta b(165),b(149),b(85),b(85),b(80),b(1),b(81),b(114) dta b(80)'},b(84),b(80),b(68),b(16),b(0),b(20),b(52) dta b(2),b(3),b(111),b(3),b(2),b(114),b(81),b(1) dta d' ',b(228),d' ',b'}(52),b(20),b(0)supra equ * dta b(164),b(148),b(84),b(80),b(67),b(8),b(60),b(250) dta b(60),b(250),b(233'}),b(164),b(16),b(48),b(48),b(36) dta b(233),b(36),b(3),b(64),b(16),b(68),b(16),b(0) dta b(24),b(12),b(12),b(196),b('}60),b(250),b(233),b(36)energy equ * dta b(31),b(122),b(229),b(229),b(230),b(230),b(230),b(229) dta b(240'}),b(168),b(89),b(89),b(169),b(169),b(169),b(105) dta b(229),b(230),b(230),b(230),b(229),b(229),b(106),b(21) dta b(1'}05),b(169),b(169),b(169),b(89),b(89),b(168),b(80) org $2e0 dta a(poczatek)b(21) dta b(1$k